Vlozeni textu nebo stringu na konkretni radek MEMA

Otázka od: Tomáš Bárta

3. 9. 2002 12:53

Ahoj,

potrebuju pridat text a hodnoty z promennych na urcity radek MEMO. Napriklad
jeden radek s textem na 10. radku a nekolik cisel z promennych az na 13. radku.
Poradte prosim nekdo!

Dik!

Tomas Barta

Odpovedá: ing. Jan Fiala

3. 9. 2002 13:40

Memo.Lines je typu TStrings:
Memo.Lines[9] := 'neco na desaty radek';
Memo.Lines[12] := 'neco na 13. radek';

Ovsem predtim budes muset zkontrolovat, zda tam ten pocet radku
skutecne mas a pripadne je tam doplnit.
For i := 0 to 12 do
  MemoLines.Add('');

--
ing. Jan Fiala
mailto:jan.fiala@iol.cz

3.9.2002 "Tomáš Bárta":
> potrebuju pridat text a hodnoty z promennych na urcity radek MEMO.
> Napriklad jeden radek s textem na 10. radku a nekolik cisel z
> promennych az na 13. radku. Poradte prosim nekdo!

Odpovedá: Ben, Martin (CAP, GCF)

3. 9. 2002 21:54

//nahradit text na 10.radku
Memo1.Lines[9] := 'nejaky_text';
//doplnit text na 10.radku
Memo1.Lines[9] := Memo1.Lines[9] + 'nejaky_text';

//nahradit text na 13.radku cislem
Memo1.Lines[12] := IntToStr(13);
//nebo
Memo1.Lines[12] := FloatToStr(13.5);

Martin Ben

-----Original Message-----
From: Tomáš Bárta [mailto:tomik_b@seznam.cz]

potrebuju pridat text a hodnoty z promennych na urcity radek MEMO. Napriklad
jeden radek s textem na 10. radku a nekolik cisel z promennych az na 13.
radku. Poradte prosim nekdo!

Odpovedá: Pavel Mattivi

3. 9. 2002 12:56

Memo1.Lines.Strings[20]:=Memo1.Lines.Strings[10]+Memo1.Lines.Strings[13]+'novy text';

Pavel Mattivi
Dezadata spol. s r.o.
Mostní 102
757 01, Valašské Meziříčí
tel.: 0651/618 939, tel./fax: 0651/618 933
mobil: 0608 743 824
pmattivi@dezadata.cz


  potrebuju pridat text a hodnoty z promennych na urcity radek MEMO. Napriklad
jeden radek s textem na 10. radku a nekolik cisel z promennych az na 13. radku.
Poradte prosim nekdo!

Odpovedá: Käss, Pavel

3. 9. 2002 20:22

for i:=MemoLines.Lines.Count+1 to 12 do...

> -----Original Message-----
> skutecne mas a pripadne je tam doplnit.
> For i := 0 to 12 do
> MemoLines.Add('');
>

Odpovedá: ing. Jan Fiala

3. 9. 2002 16:20

To bylo pro ilustraci, pokud by to memo mel prazdne, ale stejne by to
melo byt spis

for i:=MemoLines.Lines.Count to 12 do...

a ne Count+1  

--
ing. Jan Fiala
mailto:jan.fiala@iol.cz

3.9.2002 "Käss, Pavel":
> for i:=MemoLines.Lines.Count+1 to 12 do...

>> -----Original Message-----
>> skutecne mas a pripadne je tam doplnit.
>> For i := 0 to 12 do
>> MemoLines.Add('');
>>